home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / Magazine / SFX / sfx-data / _rexx / SimpleInfo.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1998-12-15  |  406 b   |  24 lines
  1. /* SFX Info */
  2.  
  3. OPTIONS RESULTS
  4. ADDRESS REXX_SFX
  5.  
  6. SFX_GetActiveBuffer
  7. buf1=RESULT
  8. IF buf1>-1 THEN DO
  9.     SFX_GetLength buf1
  10.     slen=RESULT
  11.     SFX_GetRate buf1
  12.     srat=RESULT
  13.     SFX_GetChannels buf1
  14.     scha=RESULT
  15.  
  16.     say 'sampleparameter for active buffer :'
  17.     say '  samplerate     : 'srat
  18.     say '  samplelength   : 'slen
  19.     say '  nr of channels : 'scha
  20. END
  21. ELSE SFX_Message '"No sample to operate on !"'
  22. SFX_Activate
  23. EXIT
  24.